00100 COMMENT - GEOMETRIC MODELING EMBEDDED IN LISP - 00200 - MAIN EXECUTION - NOVEMBER 1972 - 00300 ; 00400 BEGIN "GEOMEL" 00500 REQUIRE "SALISP[LSP,BGB]" LOAD_MODULE; 00600 EXTERNAL SIMPLE INTEGER PROCEDURE LISP (INTEGER SIZE); 00700 EXTERNAL SIMPLE PROCEDURE INITIA; 00800 INITIA; 00900 LISP(6000); 01000 END "GEOMEL";